function ret = Data2Model(xmodel,ymodel,zmodel)
% rotX = @(theta)[1  0 0; 0 cos(theta) -sin(theta); 0 sin(theta) cos(theta)];
rotMat = rotX(pi/2);
modelVect = [xmodel;ymodel;zmodel];
ret = rotMat*modelVect;
end

function retX = rotX(theta)
retX = [1         0     0; 
        0 cos(theta) -sin(theta); 
        0 sin(theta) cos(theta)];
end

% function retY = rotY(theta)
% 
% retY = [cos(theta)         0     sin(theta); 
%         0                  1     0; 
%         -sin(theta)        0    cos(theta)];
% end

% function retZ = rotZ(theta)
% 
% retZ =  [cos(theta)       -sin(theta)     0; 
%          sin(theta)        cos(theta) -sin(theta); 
%           0                 0            1];
% end